home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-01 / atan2bug.zip / ATAN2TST.C < prev   
C/C++ Source or Header  |  1990-01-28  |  988b  |  56 lines

  1. #include <stdio.h>
  2. #include <math.h>
  3.  
  4. void main()
  5. {
  6.     int i;
  7.     double y, x, z;
  8.  
  9.     fprintf(stdout, "\nTraverse the circle from -pi to +pi:\n\n");
  10.  
  11.     x = -1.0;
  12.     y = -0.0;
  13.     z = atan2(y,x);
  14.     printf("atan2(%+2g,%+2g): %+4.4g\n", y, x, z);
  15.  
  16.     x = -0.0;
  17.     y = -1.0;
  18.     z = atan2(y,x);
  19.     printf("atan2(%+2g,%+2g): %+4.4g\n", y, x, z);
  20.  
  21.     x = +0.0;
  22.     y = -1.0;
  23.     z = atan2(y,x);
  24.     printf("atan2(%+2g,%+2g): %+4.4g\n", y, x, z);
  25.  
  26.     x = +1.0;
  27.     y = -0.0;
  28.     z = atan2(y,x);
  29.     printf("atan2(%+2g,%+2g): %+4.4g\n", y, x, z);
  30.  
  31.     x = +1.0;
  32.     y = +0.0;
  33.     z = atan2(y,x);
  34.     printf("atan2(%+2g,%+2g): %+4.4g\n", y, x, z);
  35.  
  36.     x = +0.0;
  37.     y = +1.0;
  38.     z = atan2(y,x);
  39.     printf("atan2(%+2g,%+2g): %+4.4g\n", y, x, z);
  40.  
  41.     x = -0.0;
  42.     y = +1.0;
  43.     z = atan2(y,x);
  44.     printf("atan2(%+2g,%+2g): %+4.4g\n", y, x, z);
  45.  
  46.     x = -1.0;
  47.     y = +0.0;
  48.     z = atan2(y,x);
  49.     printf("atan2(%+2g,%+2g): %+4.4g\n", y, x, z);
  50.  
  51.     x = 0.0;
  52.     y = 0.0;
  53.     z = atan2(y,x);
  54.     printf("atan2(%+2g,%+2g): %4.4g\n", y, x, z);
  55. }
  56.